From 06444f300ecb767b42ad09f0e2d35e098dd1402d Mon Sep 17 00:00:00 2001 From: Justin Burkett Date: Wed, 17 Aug 2016 11:11:56 -0400 Subject: [PATCH] Fix minibuffer echo not displaying See #133 --- which-key.el | 29 +++++++++++++++-------------- 1 file changed, 15 insertions(+), 14 deletions(-) diff --git a/which-key.el b/which-key.el index 5d08278db82..ccac5ce50f8 100644 --- a/which-key.el +++ b/which-key.el @@ -1657,20 +1657,21 @@ is the width of the live window." (defun which-key--echo (text) "Echo TEXT to minibuffer without logging." - (let* ((minibuffer (eq which-key-popup-type 'minibuffer)) - ;; (delay (if minibuffer - ;; 0.2 - ;; (+ (or echo-keystrokes 0) 0.001))) - message-log-max) - (unless minibuffer (message "%s" text)) - - ;; Caused some completion commands in the minibuffer to be overwritten, so - ;; disable the hack for now - - ;; (run-with-idle-timer - ;; delay nil (lambda () (let (message-log-max) - ;; (message "%s" text)))) - )) + (let (message-log-max) + (message "%s" text))) + +;; Caused some completion commands in the minibuffer to be overwritten, so +;; disable the hack for now +;; (defun which-key--echo (text) +;; "Echo TEXT to minibuffer without logging." +;; (let* ((minibuffer (eq which-key-popup-type 'minibuffer)) +;; (delay (if minibuffer +;; 0.2 +;; (+ (or echo-keystrokes 0) 0.001))) +;; message-log-max) +;; (run-with-idle-timer +;; delay nil (lambda () (let (message-log-max) +;; (message "%s" text)))))) (defun which-key--next-page-hint (prefix-keys) "Return string for next page hint." -- 2.30.2